DATA: lt_prop_sel TYPE TABLE OF bapipropqy,
ls_prop_sel TYPE bapipropqy,
lt_result_list TYPE TABLE OF bapidoctab,
ls_result TYPE bapidoctab,
ls_record_doc_id TYPE sdokobject.
ls_prop_sel-propname = 'SRM_DOCUMENT_ID'.
ls_prop_sel-sign = 'I'.
ls_prop_sel-option = 'EQ'.
ls_prop_sel-propval_lo = lv_pernr.
APPEND ls_prop_sel TO lt_prop_sel.
CALL FUNCTION 'BAPI_RECORD_GETLIST'
EXPORTING
rms_id = ls_scnid_para-rms_id
sps_id = ls_otype_para-rec_sps_id
TABLES
property_selection = lt_prop_sel
resulting_list = lt_result_list.
READ TABLE lt_result_list INTO ls_result INDEX 1.
IF sy-subrc <> 0.
EXIT.
ENDIF.
ls_record_doc_id-class = ls_result-docclass.
ls_record_doc_id-objid = ls_result-objectid.